home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / graphics / switchf.arc / init.c < prev    next >
C/C++ Source or Header  |  1987-08-24  |  1KB  |  68 lines
  1.         /***********************************************\
  2.         *                        *
  3.         *                init.h            *
  4.         *    Common file for C interface        *
  5.         *    to low level Line A calls        *
  6.         *                        *
  7.         *    J.R. Bammi                *
  8.         *      decvax!cwruecmp!bammi            *
  9.         *      bammi%cwru.edu.CSNET            *
  10.         *      bammi@cwru.edu.ARPA            *
  11.         *      CIS: 71515,155            *
  12.         *                        *
  13.         \***********************************************/
  14.  
  15. #include "aline.h"
  16.  
  17.         /*  A L C Y O N  */
  18. #ifdef ALCYON
  19. VOID init_aline()
  20. {
  21.     asm(".dc.w    $a000");        /* Line A Init                  */
  22.     asm("move.l    a0, _aline");    /* Address of param block       */
  23.     asm("move.l    a1, _fonts");    /* Array of system font headers */
  24.     asm("move.l    a2, _funcs");    /* Pointers to line a functions */
  25.  
  26.     naline = ((NLINEA *)aline) - 1; /* Pointer to negative offset parms */
  27.  
  28. }
  29. #endif /* ALCYON */
  30.  
  31.         /*  M A R K   W I L L I A M S  */
  32. #ifdef MWC
  33. #include <linea.h>
  34.  
  35. VOID init_aline()
  36. {
  37.     linea0();
  38.     aline = (LINEA *)(la_init.li_a0);
  39.     fonts = (FONT **)(la_init.li_a1);
  40.     funcs = la_init.li_a2;
  41.     naline = ((NLINEA *)aline) - 1;
  42. }
  43.  
  44. #endif /* MWC */
  45.  
  46.     
  47.         /*  M E G A M A X  */
  48.         /* CAUTION --- NOT TESTED */
  49. #ifdef MEGAMAX
  50. init_aline()
  51. {
  52.     asm
  53.     {
  54.         dc.w     0XA000
  55.         movea.l  A0,aline
  56.         movea.l  A1,fonts
  57.         movea.l  A2,funcs
  58.     }
  59.     naline = ((NLINEA *)aline) - 1;
  60. }
  61. #endif /* MEGAMAX */
  62.  
  63. #ifdef LATTICE
  64.     /* Someone fill this in */
  65. #endif /* LATTICE */
  66.  
  67. /** EOF **/
  68.